save_form WAIS Save Form2 Label1 File Name: filename Label2 Files Label3 Directories cancel &Cancel file_box drive_box dir_box Dir1_Change drive_box_Change dir_box drive_box drive dir_box_ChangeS file_box listcount listindex Form_Click Form_Loadx pattern filename text* file_box_Click file_box_DblClick ok_Click savenamel doc_lines save_form cancel_Click character mousepointer HOURGLASS mouseptr NORMAL DEFAULT drive_box_Change dir_box_Change Form_Load file_box_DblClick ok_Click wais.$$$ For x& = 1 To doc_lines& wais.$$$ cancel_Click